## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.3 ✔ readr 2.1.4
## ✔ forcats 1.0.0 ✔ stringr 1.5.1
## ✔ ggplot2 3.4.4 ✔ tibble 3.2.1
## ✔ lubridate 1.9.3 ✔ tidyr 1.3.0
## ✔ purrr 1.0.2
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
## Rows: 50 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## dbl (3): Year, Death_Rate, Deaths
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## dbl (3): Male_Ratio, Female_Ratio, Total_Ratio
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 3
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## num (1): Real_GDP_per_Capita
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 3
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abr
## num (1): Number_of_ Registered_Weapon
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
1.The distribution of gun violence in each state in US

2.The relationship between gender and gun violence

##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
3.The relationship between wealth and gun violence
## `geom_smooth()` using formula = 'y ~ x'

## `geom_smooth()` using formula = 'y ~ x'

4.The relationship between number of firearms and gun violence
## # A tibble: 50 × 7
## Year State abbr Death_Rate Deaths abr Number_of_ Registered_Weapo…¹
## <dbl> <chr> <chr> <dbl> <dbl> <chr> <dbl>
## 1 2021 Alabama AL 26.4 1315 AL 194920
## 2 2021 Alaska AK 25.2 182 AL 28237
## 3 2021 Arizona AZ 18.3 1365 AZ 258691
## 4 2021 Arkansas AR 23.3 698 AR 133981
## 5 2021 California CA 9 3576 CA 406360
## 6 2021 Colorado CO 17.8 1064 CO 149382
## 7 2021 Connecticut CT 6.7 248 CT 74874
## 8 2021 Delaware DE 16.6 158 DE 6092
## 9 2021 Florida FL 14.1 3142 FL 518725
## 10 2021 Georgia GA 20.3 2200 GA 304124
## # ℹ 40 more rows
## # ℹ abbreviated name: ¹​`Number_of_ Registered_Weapon`


## `geom_smooth()` using formula = 'y ~ x'
